home *** CD-ROM | disk | FTP | other *** search
- object frmAddress: TfrmAddress
- Left = 362
- Top = 698
- Width = 150
- Height = 234
- BorderIcons = [biSystemMenu]
- BorderStyle = bsSizeToolWin
- Caption = 'Addresses'
- Color = clBtnFace
- UseDockManager = True
- DragKind = dkDock
- DragMode = dmAutomatic
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -14
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- OldCreateOrder = True
- Scaled = False
- OnClose = FormClose
- OnCreate = FormCreate
- OnDestroy = FormDestroy
- OnDeactivate = FormDeactivate
- OnResize = FormResize
- OnShow = FormShow
- PixelsPerInch = 120
- TextHeight = 16
- object pnlList: TPanel
- Left = 0
- Top = 0
- Width = 142
- Height = 207
- Align = alClient
- BevelInner = bvRaised
- BevelOuter = bvLowered
- ParentColor = True
- TabOrder = 0
- object Bevel1: TBevel
- Left = 2
- Top = 188
- Width = 138
- Height = 2
- Align = alBottom
- Shape = bsBottomLine
- end
- object Bevel2: TBevel
- Left = 2
- Top = 41
- Width = 138
- Height = 2
- Align = alTop
- Shape = bsTopLine
- end
- object AddressList: TListBox
- Left = 2
- Top = 43
- Width = 138
- Height = 145
- Align = alClient
- BorderStyle = bsNone
- DragMode = dmAutomatic
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = 15
- Font.Name = 'Arial'
- Font.Style = []
- ItemHeight = 15
- ParentFont = False
- PopupMenu = PopupCopy
- Sorted = True
- TabOrder = 0
- OnDblClick = AddressListDblClick
- OnDragDrop = AddressListDragDrop
- OnDragOver = AddressListDragOver
- OnKeyPress = AddressListKeyPress
- OnMouseUp = AddressListMouseUp
- end
- object pnlCombo: TPanel
- Left = 2
- Top = 2
- Width = 138
- Height = 39
- Align = alTop
- BevelOuter = bvNone
- ParentColor = True
- TabOrder = 1
- object LblAddress: TLabel
- Left = 2
- Top = 0
- Width = 76
- Height = 15
- Caption = 'Address book'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = 15
- Font.Name = 'Arial'
- Font.Style = []
- ParentFont = False
- ParentShowHint = False
- ShowHint = True
- end
- object BtnDetails: TSpeedButton
- Left = 114
- Top = 15
- Width = 23
- Height = 22
- Cursor = crHandPoint
- Hint = 'Details...'
- Anchors = [akTop, akRight]
- Flat = True
- Glyph.Data = {
- F6000000424DF600000000000000760000002800000010000000100000000100
- 0400000000008000000000000000000000001000000010000000000000000000
- 80000080000000808000800000008000800080800000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00DDDDDDDDDDDD
- DDDDDDDD00DDDDDDDDDDDDDD7000DDDDDDDDDDD077F00DDDDDDDDD077FFF000D
- DDDDDD07FFFFFF80DDDDD077FFFFF8700DDD077FFFFF877F000077FFFFF877FF
- FFF07FFFFFF87FFFFFFDDFFFFF877FFFFFDDDDDFF877FFFFFDDDDDDDDD7FFFFF
- DDDDDDDDDDFFFFFDDDDDDDDDDDDDFFFDDDDDDDDDDDDDDDDDDDDD}
- OnClick = BtnDetailsClick
- end
- object ComboBox: TEnhComboBox
- Left = 1
- Top = 15
- Width = 107
- Height = 23
- Style = csDropDownList
- AutoDropDownWidth = True
- Ctl3D = False
- DropDownWidth = 107
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = 15
- Font.Name = 'Arial'
- Font.Style = []
- ItemHeight = 15
- Items.Strings = (
- 'By Nickname'
- 'By Full name'
- 'By E-mail address')
- HorizontalExtent = 0
- ParentCtl3D = False
- ParentFont = False
- TabOrder = 0
- OnChange = ComboBoxChange
- end
- end
- object PnlBottom: TPanel
- Left = 2
- Top = 190
- Width = 138
- Height = 15
- Align = alBottom
- BevelOuter = bvNone
- TabOrder = 2
- object BtnLeft: TSpeedButton
- Left = 0
- Top = 1
- Width = 40
- Height = 13
- Cursor = crHandPoint
- Hint = 'Previous address book'
- Flat = True
- Glyph.Data = {
- F6000000424DF600000000000000760000002800000010000000100000000100
- 0400000000008000000000000000000000001000000010000000000000000000
- 8000008000000080800080000000800080008080000080808000C0C0C0000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF
- FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
- FFFFFFFFFFF77FFFFFFFFFFF77CC7FFFFFFFF77CC7CC7F77F77FCC7CC7CC7CC7
- CC7FCCFCC7CC7CCFCCFFFFFCCFCC7FFFFFFFFFFFFFCCFFFFFFFFFFFFFFFFFFFF
- FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF}
- OnClick = BtnLeftClick
- end
- object BtnRight: TSpeedButton
- Left = 81
- Top = 1
- Width = 41
- Height = 13
- Cursor = crHandPoint
- Hint = 'Next address book'
- Flat = True
- Glyph.Data = {
- F6000000424DF600000000000000760000002800000010000000100000000100
- 0400000000008000000000000000000000001000000010000000000000000000
- 8000008000000080800080000000800080008080000080808000C0C0C0000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF
- FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
- FFFFFFFFFFF77FFFFFFFFFFFFFCC7F77FFFFF77F77CC7CC7F77FCC7CC7CC7CC7
- CC7FCCFCCFCCFCCFCCFFFFFFFFCCFCCFFFFFFFFFFFCCFFFFFFFFFFFFFFFFFFFF
- FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF}
- OnClick = BtnRightClick
- end
- object BtnSetup: TSpeedButton
- Left = 40
- Top = 1
- Width = 41
- Height = 13
- Cursor = crHandPoint
- Hint = 'Setup address books'
- Flat = True
- Glyph.Data = {
- F6000000424DF600000000000000760000002800000010000000100000000100
- 0400000000008000000000000000000000001000000010000000000000000000
- 8000008000000080800080000000800080008080000080808000C0C0C0000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF
- FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
- FFFFFFFFFFF777FFFFFFFF77FF44477FF77FF4477444447F4477444474444474
- 44474444F4444474444FF44FF44444FF44FFFFFFFF444FFFFFFFFFFFFFFFFFFF
- FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF}
- OnClick = BtnSetupClick
- end
- end
- end
- object PopupCopy: TPopupMenu
- Left = 22
- Top = 134
- object CopyEmailAddress1: TMenuItem
- Caption = '&Copy E-mail Address'
- OnClick = CopyEmailAddress1Click
- end
- end
- object PopupLists: TPopupMenu
- OnPopup = PopupListsPopup
- Left = 54
- Top = 30
- object AddAddresstMenu: TMenuItem
- Caption = 'Add Address to Address &Book'
- OnClick = AddAddresstMenuClick
- end
- object NewMessageTo1: TMenuItem
- Caption = '&New Message To...'
- OnClick = NewMessageTo1Click
- end
- object N4: TMenuItem
- Caption = '-'
- end
- object AddToListMenu: TMenuItem
- Caption = 'Add Address to &List'
- end
- object RemoveFromListMenu: TMenuItem
- Caption = '&Remove Address from List'
- end
- object N1: TMenuItem
- Caption = '-'
- end
- object Undo1: TMenuItem
- Caption = '&Undo'
- OnClick = Undo1Click
- end
- object N2: TMenuItem
- Caption = '-'
- end
- object Cut1: TMenuItem
- Caption = 'Cu&t'
- OnClick = Cut1Click
- end
- object Copy1: TMenuItem
- Caption = '&Copy'
- OnClick = Copy1Click
- end
- object Paste1: TMenuItem
- Caption = '&Paste'
- OnClick = Paste1Click
- end
- object Delete1: TMenuItem
- Caption = '&Delete'
- OnClick = Delete1Click
- end
- object N3: TMenuItem
- Caption = '-'
- end
- object SelectAll1: TMenuItem
- Caption = 'Select &All'
- OnClick = SelectAll1Click
- end
- end
- end
-